From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 28 Mar 1993 22:27:23 +0000 (+0000)
Subject: (setenv): Renamed back from putenv.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~96650
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=b3b8e915784908ca28639e48158018dec9746de4;p=emacs.git

(setenv): Renamed back from putenv.
---

diff --git a/lisp/env.el b/lisp/env.el
index 145c164ddde..256a3338e60 100644
--- a/lisp/env.el
+++ b/lisp/env.el
@@ -31,7 +31,7 @@
 ;;; Code:
 
 ;;;###autoload
-(defun putenv (variable &optional value)
+(defun setenv (variable &optional value)
   "Set the value of the environment variable named VARIABLE to VALUE.
 VARIABLE should be a string.  VALUE is optional; if not provided or is
 `nil', the environment variable VARIABLE will be removed.  
@@ -52,9 +52,6 @@ This function works by modifying `process-environment'."
 	  (setq process-environment
 		(cons (concat variable "=" value) process-environment))))))))
 
-;; Provide backward-contemptibility. 
-(fset 'setenv 'putenv)
-
 (provide 'env)
 
 ;;; env.el ends here